home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
How Would You Survive?
/
How Would You Survive (1995)(Grolier)[Mac-PC].iso
/
mac
/
AZTECW.DIR
/
01700_Script_Farming
< prev
next >
Wrap
Text File
|
1995-09-12
|
7KB
|
210 lines
global gQuest, gBeenClicked, gHouseIsOpen
on AFarmRollovers
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(7) then
repeat while rollover(7)
AztecCursor
puppetsprite 17, true
puppetsprite 16, true
set the locH of sprite 16 to 445
set the locV of sprite 16 to 291
set the locH of sprite 17 to 406
set the locV of sprite 17 to 381
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 7, 363, 3, 0, 3
end repeat
end if
end if
end repeat
set the locH of sprite 17 to 906
puppetsprite 17, false
updatestage
else
if rollover(8) then
repeat while rollover(8)
AztecCursor
puppetsprite 18, true
puppetsprite 16, true
set the locH of sprite 16 to 445
set the locV of sprite 16 to 291
set the locH of sprite 18 to 210
set the locV of sprite 18 to 381
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 8, 366, 3, 0, 3
end repeat
end if
end if
end repeat
set the locH of sprite 18 to 910
puppetsprite 18, false
updatestage
else
if rollover(10) then
repeat while rollover(10)
AztecCursor
puppetsprite 19, true
puppetsprite 16, true
set the locH of sprite 16 to 445
set the locV of sprite 16 to 291
set the locH of sprite 19 to 427
set the locV of sprite 19 to 389
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 10, 369, 3, 0, 3
end repeat
end if
end if
end repeat
set the locH of sprite 19 to 927
puppetsprite 19, false
updatestage
else
if rollover(9) then
repeat while rollover(9)
AztecCursor
puppetsprite 20, true
puppetsprite 16, true
set the locH of sprite 16 to 445
set the locV of sprite 16 to 291
set the locH of sprite 20 to 370
set the locV of sprite 20 to 386
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopToFro 9, 372, 2, 0, 3
end repeat
end if
end if
end repeat
set the locH of sprite 20 to 970
puppetsprite 20, false
updatestage
else
if rollover(28) then
ArrowCursor
repeat while rollover(28)
puppetsprite 43, true
puppetsprite 16, true
set the locH of sprite 16 to 445
set the locV of sprite 16 to 291
set the locH of sprite 43 to 502
set the locV of sprite 43 to 373
updatestage
end repeat
set the locH of sprite 43 to 902
puppetsprite 43, false
updatestage
else
if rollover(21) then
ArrowCursor
set the locH of sprite 16 to 800
puppetsprite 16, false
updatestage
repeat while rollover(21)
set the locH of sprite 11 to 421
set the locV of sprite 11 to 225
updatestage
end repeat
set the locH of sprite 11 to 921
updatestage
else
if rollover(12) then
ArrowCursor
set the locH of sprite 16 to 800
puppetsprite 16, false
updatestage
repeat while rollover(12)
set the locH of sprite 13 to 365
set the locV of sprite 13 to 353
updatestage
end repeat
set the locH of sprite 13 to 965
updatestage
else
if rollover(14) then
ArrowCursor
set the locH of sprite 16 to 800
puppetsprite 16, false
updatestage
repeat while rollover(14)
set the locH of sprite 15 to 420
set the locV of sprite 15 to 225
updatestage
end repeat
else
if the mousecast = the castnum of sprite 6 then
ArrowCursor
set the locH of sprite 16 to 800
puppetsprite 16, false
updatestage
repeat while the mousecast = the castnum of sprite 6 or rollover(22)
puppetsprite 22, true
set the locH of sprite 22 to 378
set the locV of sprite 22 to 212
updatestage
end repeat
puppetsprite 22, false
else
if rollover(39) then
ArrowCursor
set the locH of sprite 16 to 800
puppetsprite 16, false
updatestage
repeat while rollover(39)
set the locH of sprite 40 to 479
set the locV of sprite 40 to 272
updatestage
end repeat
else
if rollover(40) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on ResetFarming
set the locH of sprite 16 to 800
puppetsprite 16, false
updatestage
end